home *** CD-ROM | disk | FTP | other *** search
/ Home of Orchestra World / Home of Orchestra World.iso / musician.dir / 00027_Script_27 < prev    next >
Text File  |  1980-01-05  |  2KB  |  63 lines
  1. on enterFrame
  2.   
  3. end
  4.  
  5. on exitframe
  6.   puppetSprite 36,TRUE
  7.   puppetSprite 37,TRUE
  8.   puppetSprite 38,TRUE
  9.   puppetSprite 39,TRUE
  10.   puppetSprite 40,TRUE
  11.   puppetSprite 41,TRUE
  12.   puppetSprite 42,TRUE
  13.   puppetSprite 43,TRUE
  14.   puppetSprite 44,TRUE
  15.   puppetSprite 45,TRUE
  16.   
  17.   set the immediate of sprite 36 to TRUE
  18.   set the immediate of sprite 37 to TRUE
  19.   set the immediate of sprite 38 to TRUE
  20.   set the immediate of sprite 39 to TRUE
  21.   set the immediate of sprite 40 to TRUE
  22.   set the immediate of sprite 41 to TRUE
  23.   set the immediate of sprite 42 to TRUE
  24.   set the immediate of sprite 43 to TRUE
  25.   set the immediate of sprite 44 to TRUE
  26.   set the immediate of sprite 45 to TRUE
  27.   
  28.   if rollover(36) = TRUE then
  29.     set the castNum of sprite 42 to the number of cast "a"
  30.   else
  31.     set the castNum of sprite 42 to the number of cast "blank.pct"
  32.   end if
  33.   
  34.   if rollover(37) = TRUE then
  35.     set the castNum of sprite 43 to the number of cast "b"
  36.   else
  37.     set the castNum of sprite 43 to the number of cast  "blank.pct"
  38.   end if
  39.   
  40.   
  41.   if rollover(38) = TRUE then
  42.     set the castNum of sprite 44 to the number of cast "c"
  43.   else
  44.     set the castNum of sprite 44 to the number of cast "blank.pct" 
  45.   end if
  46.   
  47.   if rollover(39) = TRUE then
  48.     set the castNum of sprite 45 to the number of cast "d"
  49.   else
  50.     set the castNum of sprite 45 to the number of cast "blank.pct" 
  51.   end if
  52.   
  53.   if rollover(40) = TRUE then
  54.     set the castNum of sprite 41 to the number of cast "e"
  55.   else
  56.     set the castNum of sprite 41 to the number of cast "blank.pct" 
  57.   end if
  58.   
  59.   
  60.   
  61.   
  62.   go to the frame
  63. end